home *** CD-ROM | disk | FTP | other *** search
/ Interactive Media Design Review 1999 / Interactive Media Design Review 1999.iso / pc / allfiles / Centri / Centri.dir / 00285_Script_ClickThrough < prev    next >
Text File  |  1999-02-25  |  2KB  |  64 lines
  1. property origSprite, ControlChannel, channel1, channel2, channel3, channel4, arrowL, arrowR
  2.  
  3. on exitFrame me
  4.   if the memberNum of sprite origSprite = channel1 then
  5.     set the memberNum of sprite ControlChannel = 77  
  6.   else
  7.     set the memberNum of sprite ControlChannel = 75
  8.   end if 
  9.   updateStage
  10.   puppetSprite origSprite, 1
  11. end
  12.  
  13.  
  14. on mouseUp
  15.   puppetSound 2, "click" 
  16.   puppetSprite origSprite, 1
  17.   if the memberNum of sprite origSprite = channel1 then
  18.     set the memberNum of sprite origSprite = channel2
  19.     set the visibility of sprite arrowL = TRUE
  20.   else if the memberNum of sprite origSprite = channel2 then
  21.     set the memberNum of sprite origSprite = channel3
  22.   else if the memberNum of sprite origSprite = channel3 then
  23.     set the memberNum of sprite origSprite = channel4
  24.   else if the memberNum of sprite origSprite = channel4 then
  25.     set the memberNum of sprite origSprite = channel1
  26.     set the visibility of sprite arrowR = FALSE 
  27.     
  28.   end if
  29.   updateStage
  30. end
  31.  
  32.  
  33. on getPropertyDescriptionList
  34.   
  35.   set p_list = [ ¼
  36. ControlChannel: [ #comment:   "Control Channel Sprite Number:", ¼
  37.                                #format:   #integer, ¼
  38.                               #default:    1 ] , ¼
  39.   origSprite : [ #comment:   " Sprite Number:", ¼
  40.                                #format:   #integer, ¼
  41.                               #default:    1 ] , ¼
  42.   channel1 : [ #comment:   " Channel 1:", ¼
  43.                                #format:   #integer, ¼
  44.                               #default:    2 ] , ¼
  45.   channel2 : [ #comment:   " Channel 2:", ¼
  46.                                #format:   #integer, ¼
  47.                               #default:    3 ] , ¼
  48.   channel3 : [ #comment:   "  Channel 3:", ¼
  49.                                #format:   #integer, ¼
  50.                               #default:    4 ], ¼
  51.  channel4 : [ #comment:   "  Channel 3:", ¼
  52.                                #format:   #integer, ¼
  53.                               #default:    5 ], ¼
  54.  arrowL : [ #comment:   "  Sprite for the Left Arrow:", ¼
  55.                                #format:   #integer, ¼
  56.                               #default:    6 ], ¼
  57. arrowR : [ #comment:   " Sprite for the Right Arrow", ¼
  58.                                #format:   #integer, ¼
  59.                               #default:    7 ] ]
  60.   
  61.   return p_list
  62.   
  63. end
  64.